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し じ G9SBT 上 。1 
DIM DX(19),DY(19) 
MX=199:MY ニ 179:9T ニ 5・SC ニ 90:JY ニ 9 : し ビニ 1 
CLS:SPRITE OFF:P0= ニ 9: エニ: SH ニニ 0 
し 4】 11USCD り " 
GOSUB 889 
GOSUB 119 
GOSUB 189 
GOUSUB 1189 

GOTO 79 

IF JY く > THEN GOSUB 319:GOTO 179 

民 計 内 0 の 

IF STICK(9) ニニ 2 AND MX > 89 THEN MX=MX- 1 *ST 
IF DIICK(9) ニ 1 AND MX < く 1590 THEN MX=HX+1 *ST 
IF SIRIG(9) = 8 THEN GOSUB 3109 

POSITION 9.MMX.MY:MOVOE 9 

RETURN 

JN= ニ PO0/S96 

IF NOVE(] ) ニ 9 THEN 5H ニ 9 

UN JN+1 GOSUB 239.240,259,260,270,280 ,299 ,399.7569 〇 
IF MOVE(1 ) ニ 9 THEN IF RND(19)=9 THEN GOSUB 719:SH=1 
RETURN 

GUSUB 369:RETURN 

GUSUB 439:RETURN 

GUSUB 579:RETURN 

GUSUB 649:RETURN 

GOSUB 599:RETURN 

GUSUB 579:GOSUB 649:RETURN 

GUSUB 369:GOSUB 579:RETURN 

GUSUB 599:GOSUB 439:RETURN 

り Y ニ JY+1: MY ニ NMY-12+JY 

PLAY "AB" 

POSITION 9,MX,MY:ROVE 9 

IF JY=23 THEN JY=9 

RETURN 

K ニ RND(3)+1 :C ニ 9 

IF MOVE(K) < く > 9 THEN 429 

IF K=1 THEN C ニ 1 

DEF MOVE(K)=SPRITE(2.3。RND(3)+1 ,128,9.C) 
POSITION K,9,179-RND(209 ) 

IOVUE K 

RETURN 

K=RND(3)+1 :C ニ 9 

1F HOVE(K) く > 9 THEN 4969 

1F K=] THEN C=1 

DEF MOVE(K)=SPRITE(5.3,RND(3)+3、128.0.C) 
POSITION K.9,179-RND(189 ) 

MOVE K 

RETURN 














ファ ミリ ー ベ ー シ ッ ク で 遊ぼ ぽう 


999 LOCATE 19,2 


19099 
1919 
1929 
1939 
1949 
1950 
1969 
1979 
19809 
1999 
11099 
1119 
11209 
113W 
1149 
1159 
1169 
1179 
1189 
1199 
1290 
12Z109 
1229 
1Z30 
1240 
1259 
1260 
12Z79 
12809 
1290 
1399 
1319 
132Z9 
1330 
1340 
13509 
1360 
1379 
1380 
13909 
1490 
14109 
1420 
14309 
1440 
14S9 
1 469 


PRINT SC 

LOCATE 16,1 

PRINT "キヨ リリ 

LOCATE 16,3 

PRINT PO 

LOCATE 22,1 6 
PRINT "POUER" の 


LOCATE 2Z2。3 ( 4 の 2 


PRINT ST 

LOCATE 17,9 

は 

SoPRITE ON 

DEF MOVE(9)=SPRITE(4,7。2,50 , 9 0 ) 
POSITION 9,200.179 

MOVE 9 

IF MOVE(9)<>9 THEN 1156 

DEF MOVE(9)=SPRITE(4.8,1 1.09.09) 
RETURN 

IF JY=9 THEN PO=P0+ST 

IF PO IOD 19 = 9 THEN 8C=SC+ 1 
LOCATE 9.2 

PRTINT 9 99 5 5( し 5 9 し 

し U じ CA けち 15。 コ 

PRINT 99 9.3 DP() ?) 99 

CR ニ CRASH(0 ) 

IF CR < く > 1 THEN 1299 

ERA 1:TF ST>9 THEN 1299 

1 ニ ST+2・5C = SC +199:PLAY "DECABBAAA" 
IF SH=] THEN SH=9:TI=199:ST=9 

IF CR < く 9 THEN 1346 

POSITION CR,9.9:ERA CR 

IF TI く >9 THEN 13469 

1 ニ ST-1: SC = SC +19*(JN+1):PLAY "DDCCDD" 
IF 8T=9 THEN 14109 

LOCATE 22,3 

R 旨 光電 3 は 1 7 

1F TI = 9 THEN 14969 

1=T エ - 1 

PALETS 9.13,.54,22,RND(2)*RND(79 )+ 1 
IF TI=9 THEN PALETS 9,13.54,22,2 
RETURN 

LOCATE 19,6 

PLAY "D9DDEEFFBBAABCCDDD" 

PRINT "GAME OVER 

IF HI<SC THEN HI=SC 

IF STRIG(9) く > 1 THEN 1459 

RETURN 39 
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